(diff-parse-differences): Small robustification --- don't lose if we
authorEric S. Raymond <esr@snark.thyrsus.com>
Fri, 16 Apr 1993 19:35:22 +0000 (19:35 +0000)
committerEric S. Raymond <esr@snark.thyrsus.com>
Fri, 16 Apr 1993 19:35:22 +0000 (19:35 +0000)
call this with compilation-parsing-end nil

lisp/diff.el

index bb33689c0f9f2561a4787f1e3f8bae33d74054a5..c4a83115b2c8972ee1bf02fbf5e55e32b3e9dc43 100644 (file)
@@ -74,7 +74,7 @@ is nil, REGEXP matches only half a section.")
   (message "Parsing differences...")
 
   ;; Don't reparse diffs already seen at last parse.
-  (goto-char compilation-parsing-end)
+  (if compilation-parsing-end (goto-char compilation-parsing-end))
 
   ;; Construct in REGEXP a regexp composed of all those in dired-regexp-alist.
   (let ((regexp (mapconcat (lambda (elt)
@@ -267,4 +267,6 @@ The backup file is the first file given to `diff'."
                      (> (backup-extract-version fn1)
                         (backup-extract-version fn2))))))))))
 
+(provide 'diff)
+
 ;;; diff.el ends here